home *** CD-ROM | disk | FTP | other *** search
/ The Business Master (4th Edition) / The Business Master - 4th Edition.iso / files / utilstem / ebl312 / ebl407.exe / BATDOC.BAT < prev    next >
DOS Batch File  |  1992-01-15  |  21KB  |  520 lines
  1. bat * Loading HELP and DOCUMENTATION .....
  2.  
  3. *           Written 10/5/83 through 01/15/92
  4. *   (c) Copyright 1983 to 1992 by Seaware Corp. all rights reserved.
  5. *    This batch file REQUIRES EBL PLUS for proper execution!
  6.  
  7.          **** NOTE! NOTE! NOTE! NOTE! ****
  8.  RAM    |* <-----Change 'RAM' to 'BIOS' if PC isn't 100% IBM Compatible!
  9.  
  10.  if %G = .goto. then %G = | goto -%F
  11.  else %F =
  12.  else goto -line0
  13.  
  14.  
  15. -header * Routine prints general purpose header for help text
  16.     stack.purge            |*  remove any pre-typed keystrokes.
  17.     %n = %i $ 1 ( %i # - 2 ) & . & ( %i $ ( %i # - 1 ) 2 ) |* extract section # from page #
  18.     color( white on black )
  19.     cls
  20.     color( white on cyan  )
  21.     window( 1, 1, 79, 3, Combo)
  22.     begtype
  23.  \%H                     Page \%n
  24.  
  25. \07    Press:  PGDN for next page,   PGUP for prev page,  HOME for main menu.
  26. end
  27.     color( white on black)
  28.     colorchar ~ as color(yellow on black)
  29.     window( 1, 5, 79, 25, Combo)
  30.     return
  31.  
  32. -scroll * Routine accepts key for scrolling help text
  33.     %e = 0
  34.     inkey %k
  35.     if %k = KEY("Ctrl-C") then goto -opt0
  36.     if %k = KEY(Esc)  %i = 0      | goto -line0
  37.     if %k = KEY(Home) %i = 0      | goto -line0
  38.     if %k = KEY(Pgup) %i = %i - 1 | cls | %F = line%i | goto -%F
  39.     if %k = KEY(Pgdn) %i = %i + 1 | cls | %F = line%i | goto -%F
  40.     goto -scroll |* ignore any other key.
  41.  
  42. -line1404
  43. -line99
  44. -line0
  45.     %e = 0
  46.     color white on black
  47.     cls begtype
  48. \1F╔════════════════ BATDOC ═══════════════════╗\07       \17┌─────────────────────────┐\07
  49. \1F║     Menu driven HELP and DOCUMENTATION.   ║\07       \17│ User supported software │\07
  50. \1F╙───────────────────────────────────────────╜\07       \17│      by        │\07
  51.                              \17│              │\07
  52.     \4fGENERAL:\07                       \17│ Seaware Corp.        │\07
  53. \0e 1.        Introduction and how to use this Help.   \07   \17│ P.O. Box 1656        │\07
  54. \0e 2.        The user supported concept & ASP.         \07   \17│ Delray Beach, FL 33444    │\07
  55. \0e 3.        BAT-BBS information. On-line users forum.\07   \17│ 407/738-1712        │\07
  56. \0e 4.        What EBL is... an introduction!         \07   \17│             │\07
  57. \0e 5.        EBL PLUS: The inside story!          \07   \17│ Order your registered    │\07
  58.                              \17│ copy for $79 + $3 s/h   │\07
  59.      \4fThe EBL PLUS Language\07               \17│ from us directly or our │\07
  60. \0e 6.        Showing things on the display.         \07   \17│ order line 800/634-8188 │\07
  61. \0e 7.        Reading data from users.             \07   \17│ (MC/Visa welcome)    │\07
  62. \0e 8.        Controlling program flow             \07   \17│             │\07
  63. \0e 9.        Using the keyboard stack.             \07   \17│ Please copy and share    │\07
  64. \0e 10.     Sensing program's results.               \07   \17│ BAT.COM, BATDOC.BAT,    │\07
  65. \0e 11.     Assignment statements.             \07   \17│ and BATDEMO.BAT for    │\07
  66. \0e 12.     Debugging aids.                 \07   \17│ non-commercial uses    │\07
  67. \0e 13.     Extended functions:              \07   \17│ only.            │\07
  68.        \0eConsole\07 \0eString\07 \0eSystem\07 \0eControl\07 \0eAdd-on\07       \17└─────────────────────────┘\07
  69. \0e 14.     Additional information.             \07
  70. \0e X.        eXit.                     \07
  71.  
  72.     Select the starting topic and press ─┘
  73. END
  74.  
  75. -entry0
  76.     %o =
  77.     if left(%F,3) = "opt" then field( ( ( %F $ 4 ) + 1 ) )
  78.     %A = Select( color( yellow ), color( black on white ))
  79.     if %R > 20 then goto -entry0
  80.     if %A = Enter then %F = "opt" & %R | goto -%F
  81.     if %A = ESC   then goto -opt0
  82.     if Length(%A) > 1 then beep
  83.     goto -entry0
  84.  
  85. -opt20    ********** Display final EXIT window ***********
  86. -opt0    color yellow on black  |* Setup the window contents
  87.     type left(field(1, color(black on white)),51) |* change b/w colored bar to yellow
  88.     color white on blue
  89.     window( 18, 13, 48, 20)
  90.     type "Ready to leave on-line help!"
  91.     color Cyan on blue
  92.     type "Make selection & press ─┘"
  93.     type
  94.     colorchar . as color( yellow on blue)
  95.     type ". Exit . . Demo . .Return."
  96.     colorchar
  97.     %A = "" | %F = ""
  98.         ** Now actually do the bouncing bar menu **
  99. -End1    type " Exit to DOS               " | If %A = Enter then exit
  100. -Endit    %A = select( color( yellow on blue), color( black on white ), Arrow)
  101.     if %A = Esc then goto -line0
  102.     goto -End%R
  103. -End2    type " Demonstrate other features" | If %A = Enter then stack "BATDEMO" |exit
  104.          else goto -endit
  105. -End3    type " Return to on-line help    " | If %A = Enter then goto -line0
  106.          else goto -endit
  107.  
  108. -line100 *************** Begin various chapters to show ****************
  109. -opt1    %h = INTRODUCTION | %i = 100 | call -header
  110.     begtype
  111.     This program will provide you with help information on the use of
  112. the EXTENDED BATCH LANGUAGE PLUS.  It is designed to allow for
  113. easy access and retrieval of information that would be harder to find
  114. by more conventional means.
  115.  
  116.     The information is broken up into multiple sections.  Each section
  117. may have several pages.  To access each page in order, just keep
  118. pressing the PGDN key.    At the top of your screen is the name of the
  119. section which you are in and the page number.
  120.  
  121. ~Note:~
  122.  
  123.     If you wish to directly enter another section now, press the ~HOME~
  124. key to return to the main menu, enter the proper ~section number~ and
  125. press the ~─┘~ key.
  126.  
  127. end
  128.      goto -scroll
  129. -line101 call -header | begtype
  130. While in any of these sections, there are just three keys needed:
  131.  
  132. PGDN -    This key will advance to the next page of any section. If
  133.     there are no more pages in the section, then it will advance
  134.     to the next section.
  135.  
  136. PGUP -    This key will back up to a previous page within a section.
  137.     If there are no more previous pages within a section, it
  138.     will backup to the previous section.
  139.  
  140. HOME or ESC - Either of these keys will return directly to the
  141.     main menu. From the menu, any section can be looked at
  142.     directly by entering the section number and pressing ─┘.
  143. end
  144.     goto -scroll
  145. -line199 %i = 102
  146. -line102 call -header | begtype
  147.   There are several sections where you will be given questions and answers.
  148. If you would like to peek and see answer without specifically answering it,
  149. you can press the space bar to reveal the answer letter by letter.
  150.  
  151.     One interesting facet you should know while using this on-line help
  152. and documentation is that you are using the EXTENDED BATCH LANGUAGE
  153. program to display and control these menus.
  154.  
  155.     Never before has a batch language been so powerful on the IBM
  156. personal computer as to be able to provide a facility like this.  In
  157. the following pages of description, we hope that you will see, as we
  158. did, that this program has extraordinary capability which does much
  159. more than just expand the capability of DOS.  In fact, it gives new
  160. power to your system by providing capabilities never before possible.
  161. end
  162.     goto -scroll
  163. -opt2
  164. -line103 %i = 200
  165. -line200 %H = "The User Supported Concept & ASP" | call -header | begtype
  166.  ╓─                                     ─╖
  167.  ║    The license fee for Extended Batch Language-Plus is $79 + $3 s/h      ║
  168.  ║                                      ║
  169.  ║ You are encouraged to copy and share BAT.COM, BATDOC.BAT, and      ║
  170.  ║ BATDEMO.BAT for non-commercial purposes only, however you must not      ║
  171.  ║ modify any of these files. You may use this software for evaluation      ║
  172.  ║ purposes only for a period not to exceed thirty (30) days.          ║
  173.  ║                                      ║
  174.  ║ In appreciation of your support, you will be provided with printed      ║
  175.  ║ documentation, examples, and samples of add-ons to the EBL language      ║
  176.  ║ (including source code).  All registered users can also access the      ║
  177.  ║ BAT-BBS, a hot-line for assistance, tips, and updates.          ║
  178.  ║                                      ║
  179.  ╙─     (c) Copyright 1982 through 1992 by Seaware Corp.         ─╜
  180.               All rights reserved.
  181.   Seaware Corp.                            407/738-1712
  182.   Post Office Box 1656                           800/634-8188
  183.   Delray Beach, FL 33444
  184. end
  185.     goto -scroll
  186. -line201 call -header | begtype
  187. When you register EBL-PLUS, you will receive:
  188.  ■ A detailed users guide.  This hardcopy manual has about 250 pages of
  189.                 descriptions, examples, useful utilities, and
  190.                 tips on this program's use.
  191.  
  192.  ■ The EBL-PLUS Diskette    Containing the latest program version,
  193.                 useful utilities, help files, and more examples.
  194.  
  195.  ■ Executive Menu Facility  A batch file that makes other EBL programs,
  196.                 to get started using EBL with zero effort.
  197.  
  198.  ■ 6 months of free support (generous extensions available)
  199.      o    BAT-BBS         An on-line forum for user's ideas, tips,
  200.                 programs, and assistance.
  201.  
  202.      o    Technical Hotline   Phone us if you experience problems.
  203.  
  204.      o    "The EBL User"      Our Newsletter provides information, tips, and
  205.                 and ideas on how to apply EBL-Plus to your needs.
  206. end
  207.      goto -scroll
  208. -line202 call -header | begtype
  209.  
  210. An Extended BBS support subscription is available for a nominal fee.
  211.  
  212. All users are invited to use the BAT-BBS, (See next section for more
  213. information).  Our users have signed on thousands of times and testified
  214. that this service has helped make Extended Batch Language-PLUS one of their
  215. best supported programs on their system.
  216.  
  217. The concept of excellent user support is buried deep in our roots.  Much of
  218. our philosophy was founded by Andrew Fugleman at Headlands Press, Inc.    I
  219. would like to thank Andrew for his inspiration and help.  Because I feel
  220. that good software should have someone standing behind it, we at Seaware
  221. want to put your patronage directly into support for you as our thanks of
  222. your support of us.  You will find it well worth it.
  223.  
  224.      Seaware Corp.  ≡≡≡ Post Office Box 1656  ≡≡≡ Delray Beach, FL 33444
  225.             ≡≡≡     800/634-8188      ≡≡≡     407/738-1712
  226. end
  227.      goto -scroll
  228. -line203 %H = "The User Supported Concept & ASP" |call -header | begtype
  229. Seaware is a member of the Association of Shareware Professionals, a
  230. non-profit group dedicated to promoting the shareware concept
  231. (try-before-you-buy software) as a unique marketing alternative to
  232. traditional retail distribution.  We agreed to do our best to handle
  233. customer complaints when we joined ASP.
  234.  
  235. We're committed to solve your problems quickly, and to your liking.  But
  236. if you feel like you got the short end of the stick, you can take your
  237. complaint to the ASP Ombudsman.  We'll abide by the Ombudsman's final
  238. decision on your matter, no matter what the outcome.  You have our word
  239. on it.
  240.  
  241. end
  242.     goto -scroll
  243. -opt3
  244. -line299 %i = 204
  245. -line204 %H = "ASP OMBUDSMAN STATEMENT" | call -header | begtype
  246. This program is produced by a member of the Association of Shareware
  247. Professionals (ASP).  ASP wants to make sure that the shareware
  248. principle works for you.  If you are unable to resolve a shareware-
  249. related problem with an ASP member by contacting the member directly,
  250. ASP may be able to help.  The ASP Ombudsman can help you resolve a
  251. dispute or problem with an ASP member, but does not provide technical
  252. support for members' products.
  253.  
  254. Please write to the ASP Ombudsman at:
  255.  
  256.      ASP Ombudsman
  257.      545 Grover Road
  258.      Muskegon, MI  49442-9427
  259.      U.S.A.
  260.  
  261. or send a CompuServe message via CompuServe MAIL to ASP Ombudsman
  262. [70007,3536].
  263. end
  264.     goto -scroll
  265. -opt3
  266. -line205 %i = 300
  267. -line300 %H = "BAT - BBS" | call -header | begtype
  268. One of the special services we provide to EBL PLUS users is through a
  269. communication medium called "BAT-BBS".  This is a direct link from you to
  270. other users, as well as Seaware.  If you have a modem, the BAT-BBS can be a
  271. resource of information about Extended Batch Language-Plus.
  272.  
  273. o  As a shareware user, you may call the BAT-BBS to learn more about
  274.    the capabilities of Extended Batch Language-Plus, get the latest
  275.    shareware version, and order Seaware products.
  276.  
  277. o  As a registered user you will receive 6 free months of full BAT-BBS
  278.    access and support. The BAT-BBS is a resource of information, tips,
  279.    updates, and even the latest beta versions... all available when you
  280.    register.
  281.  
  282. So check out the BAT-BBS at 407/738-1843. If you're already excited about
  283. EBL-Plus, you can order it on-line! Or call 800/634-8188 to order by voice.
  284.  
  285. The following list shows the many things that BAT-BBS can provide .  .    .
  286. end
  287.     goto -scroll
  288. -line301 call -header | begtype
  289. Registered users with a modem can....
  290.  
  291.     * Receive program updates as soon as they are available!
  292.  
  293.     * BAT-BBS is a hotline for your questions!
  294.  
  295.     * Directly access our computer at Seaware via phone.
  296.  
  297.     * It will be ready to give helpful ideas.
  298.  
  299.     * Programs and Utilities are available to download.
  300.  
  301.     * Users are welcome to upload their programs/ideas.
  302.  
  303.     * Tips and techniques are on-line.
  304.  
  305.     * Converse with other users and program author via
  306.         electronic mail.
  307. end
  308.     goto -scroll
  309. -line399 %i = 302
  310. -line302 call -header | begtype
  311.  
  312. You can access the bulletin board service by using any 300 baud to 9600
  313. baud modem with your computer.    You can use the 8,N,1 protocol.
  314.  
  315. You will also need a communication program such as PROCOMM, CROSSTALK,
  316. QMODEM, or SmartCom.  Contact your local computer store if you need more
  317. information or help with communication equipment or software.
  318.  
  319. Service is available 24 Hours a day.  Full BBS access will be
  320. supplied when you register.
  321.  
  322. end
  323. goto -scroll
  324. -opt4
  325. -line303 %i = 400
  326. -line400 %H = "Introduction" | call -header | begtype
  327.   EBL is short for Extended Batch Language.  EBL PLUS is a powerful
  328. productivity tool for the IBM Personal Computer.  It represents a
  329. significant advance in providing a comprehensive yet easy to learn and use
  330. facility for controlling tasks you give your computer.    It can even give
  331. you on-line documentation SUCH AS THIS!
  332.  
  333.   EBL is a command programming language.  It is a high level language that
  334. can be used as a direct replacement or in conjunction with DOS batch files.
  335. It can operate with IBM PC-DOS versions 2.0 through 5.x and OS/2 real
  336. mode.  Compared with standard PC-DOS batch files, EBL has superior control
  337. structures, string handling, and user interfaces.  It also has tracing
  338. facilities, and is easy to learn and use.  Many aspects of the language are
  339. like BASIC.  Users of VM/370 will also find it similar to EXEC2.  It seems
  340. that both "end users" and programmers find BAT a simple and effective
  341. language.
  342.  
  343. end
  344.     goto -scroll
  345. -line401 call -header | begtype
  346. With Extended Batch Language, you can have:
  347.  
  348. -    Better control of messages to the screen
  349.  
  350. -    Accept responses from the user and create responses to programs
  351.  
  352. -    String handling operations (substring, length, etc.)
  353.  
  354. -    Arithmetic expressions and assignments
  355.  
  356. -    Comparisons and program return codes
  357.  
  358. -    Search for files or tell if they exist
  359.  
  360. -    Complete freedom to mix DOS and BAT commands within the same control file
  361.  
  362.  
  363. Let's look at how it measures up to today's DOS......
  364. end
  365.     goto -scroll
  366. -line402 call -header | begtype
  367. Function       DOS 2.0 to 5.x      Extended Batch Language-Plus
  368. ----------       --------------      ----------------------------
  369. BEEP                       X
  370. CALL/RTN           Limited           X
  371. CLS               X           X
  372. BEGSTACK                   X
  373. BEGTYPE                    X
  374. EXIT               X           X
  375. GOTO               X           X
  376. IF               Limited           X
  377. INKEY/READ                   X
  378. READSCRN                   X
  379. STACK                       X
  380. TYPE               X           X
  381. String operations               X
  382. Assignments                   X
  383. Global Variables               X
  384. Return Codes           X           X
  385. Windows                    X
  386. end
  387.     goto -scroll
  388. -line403 call -header | begtype
  389.   As you can see from the previous chart, EBL PLUS has more
  390. power and enhanced capabilities than any version of DOS!.  This
  391. program uses these capabilities to solve common problems for......
  392.  
  393.   The system programmer - who needs to do long sequences of tasks between
  394. linker, compilers, debuggers, and editors.  He can now create an
  395. intelligent link between these programs.  For instance, he may wish to do a
  396. link depending on if the previous compile was successful.  He can also
  397. respond automatically from a keyboard "stack" into various utilities.
  398.  
  399.   The secretary - who has several types of tasks to perform (word
  400. processing, accounting packages, etc) and requires a simple way of changing
  401. from one type of task to another, perhaps with optional help text.
  402.  
  403.   The student - who wishes to go from one game to another without having to
  404. learn the system commands required to make each available.
  405.  
  406.   Testers - who wish to automate long, boring tests and procedures on the
  407. personal computer. An excellent tool for a manufacturing line.
  408. end
  409.     goto -scroll
  410. -line499 %i = 404
  411. -line404 call -header | begtype
  412.  
  413.     The effect of using EBL is to put "covers" on the programs and system
  414. that it controls.  In UNIX they call it shells, in VM they call it EXECs,
  415. but to you it simply makes things friendly.  Described in these pages is a
  416. solution to batch files through the use of Extended Batch Language.  A
  417. friendly interface to you can now be easily created.
  418.  
  419.   Once you have looked over the descriptions of each command, browse
  420. through the BATDEMO.BAT file and look at the commands in operation.  By
  421. trying out some sample programs, you should be able to gain a full
  422. understand of how to write some powerful batch files by using Extended
  423. Batch Language.
  424.  
  425.  
  426.  
  427. Copyright (c) 1982 to 1992 by Seaware Corp.           Program by
  428. All Rights reserved by Seaware Corp.               Frank Canova
  429.  
  430. end
  431.      goto -scroll
  432. -opt5
  433. -line405 %i = 500
  434. -line500 %H = "EBL PLUS: The inside story!" | call -header| begtype
  435. We rewrote the book!  Almost everything you could possible have is now
  436. in Extended Batch Language-PLUS.  We took time in getting everyone's
  437. suggestions into it, and used very little memory in doing it.
  438.  
  439.      *     Menus are  easy to create.  Just use the "Executive Menu
  440.      Facility" to create customized menus the way YOU want to
  441.      see  them.  This  automatic  procedure,  written in EBL,
  442.      will create a    custom    menu  without ever having to know
  443.      any  details  about  the  EBL    Language or batch  files.
  444.      Using your PC couldn't be easier!
  445.  
  446.      *     Create the  "Look-and-feel"  of  your  choice.  Colorful
  447.      windows  that use bouncing bar selections, pop-ups, fill
  448.      in the blank fields, and action bars are easily created.
  449.  
  450.      *     Complete freedom with    all variables.    Strings can be up
  451.      to 255 characters mixed  case, numbers to 19 digits. Use
  452.      EBL-Plus's  English-like  commands  to  integrate appli-
  453.      cations together, set up printers, or automate programs.
  454. end
  455.     goto -scroll
  456. -line501 call -header | begtype
  457.      *     Extended functions give you  additional  power where you
  458.      need    it.  Intended  for  programmers  needing  special
  459.      capabilities,    several types of functions are available:
  460.      DOS  support (CHDIR,  MKDIR,  REBOOT), low  level system
  461.      support  (PEEK,  POKE,  INT86), string  support  (STRIP,
  462.      LOWER, UPPER), and MUCH more... all built into EBL-PLUS.
  463.  
  464.      *     Create your own Add-On  functions  to EBL. If    you  have
  465.      special ideas for  the EBL language, you can create them
  466.      using    MASM,  C,  Pascal,  etc.  The    source    code  for
  467.      Seaware's add-on  functions (written in Turbo Pascal and
  468.      MASM) is provided as an example to registered users. Our
  469.      samples show you how to reserve from 0 to  64K of memory
  470.      for "extended variables" that can have long  descriptive
  471.      names and create arrays.  And    for floating point arith-
  472.      metic, just load the Turbo Pascal BCD Math add-on.
  473. end
  474.     goto -scroll
  475. -line599 %i = 502
  476. -line502 call -header | begtype
  477.      *     Full support for many more environments like PC Network,
  478.      TopView, Windows, DESQview and of course DOS 2 to DOS 5.
  479.      Now EBL Plus even supports OS/2 and 4DOS!
  480.  
  481.      *     File I/O is  easy within EBL PLUS. Use it to  setup
  482.      printers,  keep  configuration  information,  initialize
  483.      programs, or even create other batch files!
  484.  
  485.      *     Error recovery is now available  within batch files!  In
  486.      cases where  an error    is  detected  while the EBL batch
  487.      file  is  running,  you  can  now  include a  routine to
  488.      recover gracefully from the problem.
  489. end
  490.      goto -scroll
  491.  
  492. -on.error-
  493.     %e = %e + 1 | if %e > 2 then %L = ? | skip 5
  494.     if %R <> 6 then skip 7
  495.     %G = .goto.
  496.     color 8F | type "Loading part 2 ..."
  497.     leave
  498.     batdoc2
  499. bat *
  500. bat beep type "ERROR! BATDOC2.BAT overlay is missing!" | exit
  501. bat exit
  502. begtype
  503.  
  504.      Unexpected error \%S%R in line \%S%L !
  505.  
  506.      This batch file was error free when it was distributed
  507.      by Seaware. An error indicates that it was most likely
  508.      modified by someone improperly. To get an updated demo
  509.      diskette send $7 to Seaware directly or call 800/634-8188
  510.      or 407/738-1712.
  511.  
  512.  
  513.             Seaware Corp.
  514.              Post Office Box 1656
  515.             Delray Beach, FL 33444
  516. end
  517. %G =
  518. %E = 0
  519. -end%R exit
  520.